0 REM THE TRANSACTOR VOLUME 6 ISSUE 02        BITS & PIECES SECTION
100 REM* +4 BOXSPIRAL -CZ *
110 GRAPHIC 1,1: COLOR 1,1
120 X1=0:Y1=0:X2=100:Y2=100
130 N1=RND(0)*10: N2=RND(0)*10
150 FOR ANGLE=0 TO 180 STEP 5
160 BOX 1,X1,Y1,X2,Y2,ANGLE
170 X1=X1+N1: Y1=Y1+N2
190 NEXT ANGLE
200 REM* RUN AGAIN WHEN KEY PRESSED
210 GETKEY A$: RUN